home *** CD-ROM | disk | FTP | other *** search
- CMD PROMPT('File Member Maintenance/Select')
- PARM KWD(FILE) TYPE(QUAL1) MIN(1) PROMPT('File +
- Name:')
- PARM KWD(CLRRMV) TYPE(*NAME) LEN(1) RSTD(*YES) +
- DFT(Y) VALUES(Y N) PROMPT('Allow CLRPFM & +
- RMVM ?? ( Y/N )')
- QUAL1: QUAL TYPE(*NAME) LEN(10) MIN(1)
- QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) +
- SPCVAL((*LIBL)) PROMPT('Library Name:')